home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / src / demos / demobook / icons.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-08-02  |  31.6 KB  |  1,133 lines
  1. /*
  2.  * Copyright 1993, 1994, Silicon Graphics, Inc.
  3.  * All Rights Reserved.
  4.  *
  5.  * This is UNPUBLISHED PROPRIETARY SOURCE CODE of Silicon Graphics, Inc.;
  6.  * the contents of this file may not be disclosed to third parties, copied or
  7.  * duplicated in any form, in whole or in part, without the prior written
  8.  * permission of Silicon Graphics, Inc.
  9.  *
  10.  * RESTRICTED RIGHTS LEGEND:
  11.  * Use, duplication or disclosure by the Government is subject to restrictions
  12.  * as set forth in subdivision (c)(1)(ii) of the Rights in Technical Data
  13.  * and Computer Software clause at DFARS 252.227-7013, and/or in similar or
  14.  * successor clauses in the FAR, DOD or NASA FAR Supplement. Unpublished -
  15.  * rights reserved under the Copyright Laws of the United States.
  16.  */
  17. #include <stdio.h>
  18. #include "exinterfmotif.h"
  19. #include <gl.h>
  20. #include <string.h>
  21. #include <gl/image.h>
  22. #include <unistd.h>
  23. #include "exbookglo.h"
  24. #include "exglobals.h"
  25. #include "exinterf.h"
  26.  
  27. extern struct indexlist *add_keyword();
  28. extern struct indexlist *find_keyword();
  29. extern struct grptmpltstruct *find_group_wi_name();
  30. extern unsigned long *readicon_i();
  31. void remove_file(struct filestruct *deadfile);
  32. struct filestruct *add_file(char *newfile);
  33. void do_iconfiles(struct icntmpltstruct *icnptr);
  34. void print_files();
  35. void print_icon_files(struct icntmpltstruct *icn);
  36.  
  37. char inbuf[70];
  38.  
  39. /************************************************************
  40. *
  41. * count the polygons in an icon so that storage can be
  42. * allocated all at once.
  43. *
  44. ************************************************************/
  45. int countpolys(FILE *iconfp)
  46. {
  47.    int bufndx;
  48.    int polycount;
  49.    char tmp[20];
  50.    int len;
  51.  
  52.      /* count the number of polygons */
  53.    polycount = 0;
  54.    while ( fgets(inbuf,60,iconfp) != NULL)
  55.       {
  56. /* find the first char that is not a tab */
  57.       bufndx = 0;
  58.       len = strlen(inbuf);
  59.       while (bufndx < len+1 && inbuf[bufndx] == '\t')
  60.          bufndx++;
  61.       if (inbuf[bufndx] == 'b')
  62.          {
  63.          polycount++;
  64. /*
  65.          strncpy(tmp, &(inbuf[bufndx]), 10);
  66.          if (strncmp(tmp, "bgnoutlinepolygon", 10) == 0)
  67.             polycount++;
  68. */
  69.          }
  70.       }
  71.    rewind(iconfp);
  72.    return(polycount);
  73. }
  74.  
  75. /************************************************************
  76. *
  77. * Print out information about the icons.  For debugging.
  78. * DO NOT comment out the  print statements, look for 
  79. * calls to print_icons in the rest of the code.
  80. *
  81. ************************************************************/
  82. print_icons()
  83. {
  84.    struct icntmpltstruct *tmpicn;
  85.    struct indexlist *kwrd;
  86.    struct wordlist *wrdptr;
  87.    struct filelist *adfptr;
  88.    struct grpliststruct *glist;
  89.    int i;
  90.  
  91.    tmpicn = firsticon;
  92.    while (tmpicn != NULL)
  93.    {
  94.    printf(" Icon Name : %s \n",tmpicn->nameptr->string);
  95. /*
  96.    printf("startstring %s\n",tmpicn->startstring);
  97.    if (tmpicn->geofile != NULL)
  98.       printf("filename %s\n",tmpicn->geofile->name);
  99.    if (tmpicn->imgfile != NULL)
  100.       printf("filename %s\n",tmpicn->imgfile->name);
  101.    adfptr = tmpicn->addtlfiles;
  102.    while ( adfptr!= NULL)
  103.       {
  104.       if (adfptr->file != NULL)
  105.         printf(" file %s  \n",adfptr->file->name);
  106.       adfptr = adfptr->next;
  107.       }
  108. */
  109.    printf("     occurs %d  num key %d \n",tmpicn->occurences, tmpicn->numkey);
  110.    if (tmpicn->numkey != 0)
  111.       {
  112.       wrdptr = tmpicn->keywords;
  113.       printf("    keywords: \n");
  114.       for (i = 0; i < tmpicn->numkey; i++)
  115.          {
  116.          kwrd = wrdptr->indexptr;
  117.          printf("        %s  %d \n",kwrd->string, kwrd->num);
  118.          wrdptr = wrdptr->next;
  119.          }
  120.       }
  121.    if (tmpicn->grps != NULL)
  122.       {
  123.       glist = tmpicn->grps;
  124.       printf("    groups: \n");
  125.       while (glist != NULL)
  126.          {
  127.          printf("         %s  \n", glist->grpptr->nameptr->string);
  128.          glist = glist->next;
  129.          }
  130.       }
  131.    tmpicn = tmpicn->nexticntmplt;
  132.    }
  133. }
  134.  
  135. /************************************************************
  136. *
  137. * Delete an icon.  If this is the last icon on a page, delete
  138. * that page, too.  If that page was the last one in a
  139. * group, delete that group.
  140.  
  141. Currently, If a demo is in the alphabetical group and
  142. nowhere else, it can be deleted.  This porogram can not
  143. go through the other groups and remove references to an
  144. iconbefore deleting it.  But I think that this will be
  145. possible sometime.
  146. *
  147. ************************************************************/
  148. void deleteicon(thisgroup, iconnum, side)
  149. struct grptmpltstruct *thisgroup;
  150. int iconnum, side;
  151. {
  152.    int i;
  153.    struct icntmpltstruct *dead_icon_ptr, *tmpicn, *previcn;
  154.    struct wordlist *wrdptr, *nextwrd;
  155.    struct grpliststruct *glistptr, *prevglist;
  156.    Boolean found, backdone;
  157.    struct iconstruct *thisiconptr;
  158.    struct iconstruct *tmpiconptr, *previconptr, *iconhead, *grpiconptr;
  159.    struct pagestruct *thispage, *tmppg;
  160.    float org[3], rot[3], ang;
  161.    struct filelist *tmpfptr;
  162.    Boolean redraw;
  163.  
  164.    redraw = FALSE;
  165.    previconptr = NULL;
  166.    if (side == 1)
  167.       {
  168.       thispage = rightpage;
  169.       thisiconptr = thispage->fronticons;
  170.       }
  171.    else 
  172.       {
  173.       thispage = leftpage;
  174.       thisiconptr = thispage->backicons;
  175.       }
  176.    if (iconnum == 0)
  177.       {
  178.       if (side == 1)
  179.          {
  180.          tmppg = thispage->prevpage;
  181.          if (tmppg != NULL)
  182.             {
  183.             previconptr = tmppg->backicons;
  184.             redraw = TRUE;
  185.             }
  186.          }
  187.       else
  188.          previconptr = thispage->fronticons;
  189.       if (previconptr != NULL)
  190.          {
  191.          while (previconptr->nexticon != thisiconptr)
  192.             {
  193.             previconptr = previconptr->nexticon;
  194.             }
  195.          }
  196.       }
  197.    i = 0;
  198.    while (i != iconnum || (!thisiconptr->ok && Hide))
  199.       {
  200.       if (!Hide || thisiconptr->ok)
  201.          i++;
  202.       previconptr = thisiconptr;
  203.       thisiconptr = thisiconptr->nexticon;
  204.       }
  205.  
  206.    DialogType = 2;
  207.    sprintf(msgstring,"%s",thisiconptr->iconptr->nameptr->string);
  208.    popup_Question();
  209.    handleMessageEvents();
  210.    if(DeleteDemoFlag != TRUE)
  211.      return;
  212.  
  213.  
  214.    if (thisgroup->nameptr == find_keyword("Master Index") )
  215.       {
  216.         /* take it out of the book completely */
  217.       if (thisiconptr->iconptr->occurences == 1)
  218.          {
  219. /* go through the master list of icons and remove this icon from the book */
  220.          if (numberoficons == 1)
  221.             {
  222.             free(firsticon->startstring);
  223.             free(firsticon);
  224.             firsticon = NULL;
  225.             lasticon = NULL;
  226.             curicon = NULL;
  227.             free(firstgroup);
  228.             firstgroup = NULL;
  229.             lastgroup = NULL;
  230.             curgroup = NULL;
  231.             leftpage = NULL;
  232.             rightpage = NULL;
  233.             OPENBOOK = FALSE;
  234.             resetshelfcolors();
  235.             numberofgroups = 0;
  236.             numberofbooks = 0;
  237.             numberoficons = 0;
  238.             currentbook = -1;
  239.             selected = -1;
  240.             prevselection = -1;
  241.             headfile = NULL;  /* ERROR  is there anything here? */
  242.             Index = NULL;
  243.             drawscene(0);
  244.             }
  245.          else  
  246.             {
  247.             tmpicn = firsticon;
  248.             if (thisiconptr->iconptr == firsticon)
  249.                {
  250.                firsticon = thisiconptr->iconptr->nexticntmplt;
  251.                }
  252.             else
  253.                {
  254.                while (tmpicn != NULL && tmpicn != thisiconptr->iconptr)
  255.                   {
  256.                   previcn = tmpicn;
  257.                   tmpicn = tmpicn->nexticntmplt;
  258.                   }
  259.                previcn->nexticntmplt = tmpicn->nexticntmplt;
  260.                }
  261.             selected = -1;
  262.             numberoficons--;
  263.             dead_icon_ptr = tmpicn;
  264.             dead_icon_ptr->nameptr->icon = NULL;
  265.             remove_keyword(dead_icon_ptr->nameptr);
  266.             delete_keywords( dead_icon_ptr, 0);
  267.             remove_file(dead_icon_ptr->geofile);
  268.             remove_file(dead_icon_ptr->imgfile);
  269.             remove_file(dead_icon_ptr->helpfile);
  270.             tmpfptr = dead_icon_ptr->addtlfiles;
  271.             while  (tmpfptr != NULL)
  272.                {
  273.                remove_file(tmpfptr->file);
  274.                tmpfptr->file = NULL;
  275.                tmpfptr = tmpfptr->next;
  276.                }
  277.             group_setup(firsticon, 0, thisgroup);
  278.             }
  279.          }
  280.       else  /* this demo occurs in other groups in the library */
  281.          {
  282.       sprintf(msgstring, "Because this is an early version of the\ndemobook, demos will not be removed\nfrom the main book while they are\nmembers of other books.");
  283.       popup_Message();
  284.          }
  285.       }
  286.    else  /* not the alphabetical group */
  287.       {
  288.       (thisiconptr->iconptr->occurences) -= 1;
  289.       selected = -1;
  290.       seliconptr = NULL;
  291.  
  292.       dead_icon_ptr = thisiconptr->iconptr;
  293.  
  294.       /* take reference to this group out of the icon's list of groups */
  295.       glistptr = dead_icon_ptr->grps;
  296.       prevglist = NULL;
  297.       while (glistptr != NULL && glistptr->grpptr != thisgroup)
  298.          {
  299.          prevglist = glistptr;
  300.          glistptr = glistptr->next;
  301.          }
  302.       if (glistptr != NULL)
  303.          {
  304.             if (glistptr == dead_icon_ptr->grps)
  305.                dead_icon_ptr->grps = dead_icon_ptr->grps->next;
  306.             else if (glistptr->next == NULL)
  307.                {
  308.                if (prevglist != NULL)
  309.                   prevglist->next = NULL;
  310.                }
  311.             else
  312.                {
  313.                prevglist->next = glistptr->next;
  314.                }
  315.             free(glistptr);
  316.             glistptr = NULL;
  317.          }
  318.  
  319. /*
  320.       previconptr = thisiconptr;
  321.       thisiconptr = thisiconptr->nexticon;
  322. */
  323.       if (thispage != NULL)
  324.          {
  325.          if (thispage->prevpage == NULL && thispage->nextpage == NULL && thispage->frontnumicons + thispage->backnumicons == 1)
  326.             {
  327.             deletegroup(curgroup);
  328.             curgroup = NULL;
  329.             currentbook = -1;
  330.             OPENBOOK = FALSE;
  331.             drawscene(0);
  332.             }
  333.          else
  334.             {
  335.             if (previconptr == NULL) /* only if this is first icon in book */
  336.                {
  337.                if (side == 1)
  338.                   thispage->fronticons = thisiconptr->nexticon;
  339.                else
  340.                   thispage->backicons = thisiconptr->nexticon;
  341.                }
  342.             else 
  343.                previconptr->nexticon = thisiconptr->nexticon;
  344.             group_setup(NULL, NULL, thisgroup);
  345.             tmppg = thisgroup->firstpage;
  346.             if (side == 1)  /* front & right */
  347.                {
  348.                while (tmppg != NULL && tmppg != rightpage)
  349.                   tmppg = tmppg->nextpage;
  350.                if (tmppg == NULL)
  351.                   {
  352.                   leftpage = thisgroup->lastpage;
  353.                   rightpage = NULL;
  354.                   }
  355.                else
  356.                   {
  357.                   rightpage = tmppg;
  358.                   leftpage = rightpage->prevpage;
  359.                   }
  360.                }
  361.             else
  362.                {
  363.                while (tmppg != NULL && tmppg != leftpage)
  364.                   tmppg = tmppg->nextpage;
  365.                if (tmppg == NULL)
  366.                   {
  367.                   rightpage = thisgroup->firstpage;
  368.                   leftpage = NULL;
  369.                   }
  370.                else
  371.                   {
  372.                   if (tmppg->backnumicons > 0)
  373.                      {
  374.                      leftpage = tmppg;
  375.                      rightpage = leftpage->nextpage;
  376.                      }
  377.                   else
  378.                      {
  379.                      rightpage = tmppg;
  380.                      leftpage = rightpage->prevpage;
  381.                      }
  382.                   }
  383.                }
  384.             }
  385.          }
  386.       }
  387.  
  388. /*ERROR to delete a demo from the book, need to take it out of all other groups
  389.     can remove it if it's not present in any other groups
  390. */
  391.    if (redraw)
  392.       drawscene(0);
  393.    if (Indexwin >= 0)
  394.       update_index_win();
  395. }
  396.  
  397. /************************************************************
  398. *
  399. * Given a string, allocate the storage and make it the
  400. * startstring for a demo.
  401. *
  402. ************************************************************/
  403. void set_start_string(iptr,s)
  404. struct icntmpltstruct *iptr;
  405. char *s;
  406. {
  407.    if (strlen(s) > 0)
  408.       {
  409.       iptr->startstring = (char *)malloc(strlen(s)+1);
  410.       iptr->startstring = strcpy(iptr->startstring, s);
  411.       }
  412.    else
  413.       iptr->startstring = NULL;
  414. }
  415.  
  416. void set_alt_command(iptr,s)
  417. struct icntmpltstruct *iptr;
  418. char *s;
  419. {
  420.    if (strlen(s) > 0)
  421.       {
  422.       iptr->alt_command = (char *)malloc(strlen(s)+1);
  423.       iptr->alt_command = strcpy(iptr->alt_command, s);
  424.       }
  425.    else
  426.       iptr->alt_command = NULL;
  427. }
  428.  
  429. fix_icon_ok(struct icntmpltstruct *icnptr)
  430. {
  431.    struct grpliststruct *grplstptr;
  432.    struct iconstruct *iconptr;
  433.    struct grptmpltstruct *grpptr;
  434.    Boolean done;
  435.    
  436.    grplstptr = icnptr->grps;
  437.    while (grplstptr != NULL)
  438.       {
  439.       grpptr = grplstptr->grpptr;
  440.       if (grpptr != NULL)
  441.          {
  442.          iconptr = grpptr->firstpage->fronticons;
  443.          done = FALSE;
  444.          while(!done && iconptr != NULL)
  445.             {
  446.             if (iconptr->iconptr == icnptr)
  447.                {
  448.                iconptr->ok = icnptr->ok;
  449.                done = TRUE;
  450.                }
  451.             iconptr = iconptr->nexticon;
  452.             }
  453.          }
  454.       grplstptr = grplstptr->next;
  455.       }
  456. }
  457.  
  458. savedemochanges()
  459. {
  460.    struct icntmpltstruct *icnptr;
  461.    struct indexlist *tmpptr;
  462.    struct charlist *charptr, *prevcharptr;
  463.    struct wordlist *wrdptr, *twrd;
  464.    int i;
  465.    Boolean newfile;
  466.    FILE *iconfp;
  467.    struct filelist *tmpfptr, *prevfptr;
  468.    struct filestruct *tmpfs;
  469.    Boolean indexchange;
  470.    struct grpliststruct *grplstptr;
  471.  
  472.    indexchange = FALSE;
  473.    selected = -1;
  474.    icnptr = curicon;
  475.    if (strcmp(icnptr->nameptr->string, ADName.buf) != 0 )
  476.       {
  477.       indexchange = TRUE;
  478.       tmpptr = icnptr->nameptr;
  479.       if (tmpptr != NULL)
  480.          tmpptr->icon = NULL;
  481.       remove_keyword(tmpptr);
  482.       if (ADName.bufpos == 0)
  483.          if (HeadChar != NULL)
  484.             icnptr->nameptr = add_keyword(HeadChar->str);
  485.          else
  486.             icnptr->nameptr = add_keyword("unknown");
  487.       else
  488.          icnptr->nameptr = add_keyword(ADName.buf);
  489.       tmpptr = icnptr->nameptr;
  490.       if (tmpptr != NULL)
  491.          tmpptr->icon = icnptr;
  492.       alphabetize();
  493.       group_setup(firsticon, NULL, find_group_wi_name("Master Index") );
  494.       }
  495.  
  496.    if (strcmp(icnptr->startstring, ADCommand.buf) != 0 )
  497.       {
  498.       free(icnptr->startstring);
  499.       set_start_string(icnptr, ADCommand.buf);
  500.       }
  501.  
  502.    if (icnptr->alt_command != NULL && strcmp(icnptr->alt_command, ADAltCommand.buf) != 0 )
  503.       {
  504.       free(icnptr->alt_command);
  505.       set_alt_command(icnptr, ADAltCommand.buf);
  506.       }
  507.    else if (icnptr->alt_command == NULL)
  508.       set_alt_command(icnptr, ADAltCommand.buf);
  509.  
  510.    if (icnptr->helpfile == NULL && ADHfile.bufpos != 0)
  511.       icnptr->helpfile = add_file(ADHfile.buf);
  512.    else if (icnptr->helpfile != NULL && strcmp(icnptr->helpfile->name, ADHfile.buf) != 0 )
  513.       {
  514.       tmpfs = icnptr->helpfile;
  515.       remove_file(tmpfs);
  516.       if (ADHfile.bufpos == 0)
  517.          icnptr->helpfile = NULL;
  518.       else
  519.          icnptr->helpfile = add_file(ADHfile.buf);
  520.       }
  521.  
  522.    newfile = 0;
  523.    if (icnptr->geofile == NULL && ADIfile.bufpos != 0)
  524.       {
  525.       icnptr->geofile = add_file(ADIfile.buf);
  526.       newfile = 1;
  527.       }
  528.    else if (icnptr->geofile != NULL && strcmp(icnptr->geofile->name, ADIfile.buf) != 0 )
  529.       {
  530.       tmpfs = icnptr->geofile;
  531.       remove_file(tmpfs);
  532.       if (ADIfile.bufpos == 0)
  533.          icnptr->geofile = NULL;
  534.       else
  535.          icnptr->geofile = add_file(ADIfile.buf);
  536.       newfile = 1;
  537.       }
  538.  
  539.    if (icnptr->imgfile == NULL && ADIfile2.bufpos != 0)
  540.       {
  541.       icnptr->imgfile = add_file(ADIfile2.buf);
  542.       newfile = 1;
  543.       }
  544.    else if (icnptr->imgfile != NULL && strcmp(icnptr->imgfile->name, ADIfile2.buf) != 0 )
  545.       {
  546.       tmpfs = icnptr->imgfile;
  547.       remove_file(tmpfs);
  548.       if (ADIfile2.bufpos == 0)
  549.          icnptr->imgfile = NULL;
  550.       else
  551.          icnptr->imgfile = add_file(ADIfile2.buf);
  552.       newfile = 1;
  553.       }
  554.  
  555.    if (newfile)
  556.       do_iconfiles(icnptr);
  557.  
  558.    if (KW_change)
  559.       {
  560.       indexchange = TRUE;
  561.       wrdptr = icnptr->keywords;
  562.       while (wrdptr != NULL)
  563.          {
  564.          remove_keyword_icon(wrdptr->indexptr, icnptr);
  565.          twrd = wrdptr;
  566.          wrdptr = wrdptr->next;
  567.          free(twrd);
  568.          }
  569.       icnptr->keywords = NULL;
  570.       charptr = HeadChar;
  571.       i = 0;
  572.       while (charptr != NULL)
  573.          {
  574.          if (icnptr->keywords == NULL)
  575.             {
  576.           icnptr->keywords=(struct wordlist *)malloc(sizeof(struct wordlist));
  577.             wrdptr = icnptr->keywords;
  578.             }
  579.          else
  580.             {
  581.             wrdptr->next = (struct wordlist *)malloc(sizeof(struct wordlist));
  582.             wrdptr = wrdptr->next;
  583.             }
  584.          i++;
  585.          wrdptr->next = NULL;
  586.          wrdptr->indexptr = add_keyword(charptr->str);
  587.          index_add_demo(wrdptr->indexptr, icnptr);
  588.          charptr->indexflag = 1;
  589.          charptr = charptr->next;
  590.          }
  591.       icnptr->numkey = i;
  592.       KW_change = FALSE;
  593.       }
  594.  
  595.    if (EF_change)
  596.       {
  597.       icnptr->ok = TRUE;
  598.       tmpfptr = icnptr->addtlfiles;
  599.       /* delete all of the old files */
  600.       while (tmpfptr != NULL) 
  601.          {  
  602.          remove_file(tmpfptr->file);
  603.          tmpfptr->file = NULL;
  604.          tmpfptr = tmpfptr->next;
  605.          }
  606.       /* add all of the files from the interface */
  607.       charptr = Head_FL;
  608.       tmpfptr = icnptr->addtlfiles;
  609.       prevfptr = NULL;
  610.       while (charptr != NULL)
  611.          {
  612.          if (tmpfptr == NULL)
  613.             {
  614.             tmpfptr = (struct filelist *)malloc(sizeof(struct filelist) );
  615.             tmpfptr->next = NULL;
  616.             if (icnptr->addtlfiles == NULL)
  617.                icnptr->addtlfiles = tmpfptr;
  618.             }
  619.          tmpfptr->file = add_file(charptr->str);
  620.          if (tmpfptr->file != NULL)
  621.             icnptr->ok = tmpfptr->file->ok;
  622.  
  623.          if (prevfptr != NULL)
  624.             prevfptr->next = tmpfptr;
  625.          prevfptr = tmpfptr;
  626.          tmpfptr = tmpfptr->next;
  627.  
  628.          free(charptr->str);
  629.          prevcharptr = charptr->next;
  630.          free(charptr);
  631.          charptr = prevcharptr;
  632.          }
  633.       /* if I have fewer files now than I used to, delete the
  634.          unused storage */
  635.       if (prevfptr != NULL)
  636.           prevfptr->next = NULL;
  637.       while (tmpfptr != NULL)
  638.          {
  639.          prevfptr = tmpfptr->next;
  640.          free(tmpfptr);
  641.          tmpfptr = prevfptr;
  642.          }
  643.  
  644.       if (Head_FL == NULL)
  645.          icnptr->addtlfiles = NULL;
  646.       Head_FL = NULL;
  647.       Tail_FL = NULL;
  648.       EF_change = FALSE;
  649.       /* update ok for all instances of this demo */
  650.       fix_icon_ok(icnptr);
  651.       /* update ok for all the groups that this demo belongs to */
  652.       grplstptr = icnptr->grps;
  653.       while (grplstptr != NULL)
  654.          {
  655.          if (grplstptr->grpptr != NULL)
  656.             fix_grp_ok(grplstptr->grpptr);
  657.          grplstptr = grplstptr->next;
  658.          }
  659.       }
  660.    if (indexchange && Indexwin >= 0)
  661.       update_index_win();
  662. }
  663.  
  664. /* new_icn creates a new icon, then zeroes out most of the information
  665.  * to keep from referencing bogus values.  This fixes a bug that Ratman
  666.  * found where a bogus value in numkey was causing pointers to be 
  667.  * traversed beyond the NULL value. Fixed by Gretch.
  668.  */
  669. struct icntmpltstruct *new_icn()
  670. {
  671.    struct icntmpltstruct *newicon;
  672.    int i,j;
  673.  
  674.    newicon = (struct icntmpltstruct *) malloc(sizeof(struct icntmpltstruct));
  675.  
  676. /* now zero EVERYTHING out */
  677.    newicon->tex_image = NULL;
  678.    newicon->tex_id = 0;
  679.    newicon->tex_width = 0;
  680.    newicon->tex_height = 0;
  681.    newicon->poly = NULL;
  682.    newicon->keywords = NULL;
  683.    newicon->nameptr = NULL;
  684.    newicon->infoptr = NULL;
  685.    newicon->geofile = NULL;
  686.    newicon->imgfile = NULL;
  687.    newicon->helpfile = NULL;
  688.    newicon->addtlfiles = NULL;
  689.    newicon->nexticntmplt = NULL;
  690.    newicon->grps = NULL;
  691.    newicon->xsize = 0;
  692.  
  693.    for (i=0; i <4; i++)
  694.     {
  695.      for (j=0; j<3; j++)
  696.       {
  697.        newicon->bbox[i][j] = 0;
  698.       }
  699.     }
  700.  
  701.    newicon->numkey = 0;
  702.    newicon->numpoly = 0;
  703.    newicon->occurences = 0;
  704.    newicon->iconnum = 0;
  705.    newicon->startstring = NULL;
  706.    newicon->alt_command = NULL;
  707.  
  708.    newicon->ok = TRUE;
  709.  
  710.    return(newicon);            /* return pointer to this info */
  711. } 
  712. /************************************************************
  713. *
  714. * Add a demo to the book.  Add it to a group if requested.
  715. * Add it to the alphabeitcal group.
  716. *
  717. ************************************************************/
  718. void add_demo()
  719. {
  720.    struct wordlist *wrdptr;
  721.    struct charlist *charptr, *prevcharptr;
  722.    int i;
  723.    FILE *iconfp;
  724.    struct icntmpltstruct *newicon, *curicon, *previcon;
  725.    struct grptmpltstruct *tmpgrp;
  726.    IMAGE *image;
  727.    struct filelist *tmpfptr, *lastfile;
  728.    Boolean done;
  729.  
  730.  
  731.    /*if (ADName.bufpos == 0 && ADCommand.bufpos == 0)   don't add */
  732.    if (ADName.bufpos != 0 || ADCommand.bufpos != 0)/* if something's there, add */
  733.       {
  734.       if (ADName.bufpos == 0)    /* if no name is there, falsify one */
  735.          {
  736.          strcpy(ADName.buf, "No Name");
  737.          ADName.bufpos = 8;
  738.          }
  739.    lastfile = NULL;                /* reset lastfile */
  740.    newicon = new_icn();                /* get pointer to icon info */
  741.    /* assume the the numberoficons (global) hasn't been incremented yet */
  742.    if (firsticon == NULL)            /* if not set yet */
  743.       {
  744.       firsticon = newicon;            /* this IS the first icon */
  745.       lasticon = newicon;            /* and the ONLY icon! */
  746.       }
  747.    else                        /* there are other icons... */
  748.       {
  749.       previcon = NULL;                 /* we don't know which this is */
  750.       curicon = firsticon;            /* traverse icons */
  751.       while (curicon != NULL && strcmp(ADName.buf,curicon->nameptr->string)>0)
  752.          { 
  753.          previcon = curicon; 
  754.          curicon = curicon->nexticntmplt; 
  755.          }
  756.       if (curicon == NULL)
  757.          {
  758.          previcon->nexticntmplt = newicon;
  759.          lasticon = newicon;
  760.          }
  761.       else if (curicon == firsticon)
  762.          {
  763.          newicon->nexticntmplt = firsticon;
  764.          firsticon = newicon;
  765.          }
  766.       else
  767.          {
  768.          previcon->nexticntmplt = newicon;
  769.          newicon->nexticntmplt = curicon;
  770.          }
  771.       }
  772. /* redo alphabetical group */
  773.    tmpgrp = firstgroup;
  774.    done = FALSE;
  775.    while (!done && tmpgrp != NULL)
  776.       {
  777.       if (tmpgrp->nameptr == find_keyword("Master Index"))
  778.          done = TRUE;
  779.       else
  780.          tmpgrp = tmpgrp->nextgrp;
  781.       }
  782.    if (tmpgrp != NULL)
  783.       group_setup(firsticon, 0, tmpgrp);
  784.    newicon->nameptr = add_keyword(ADName.buf);
  785.    newicon->nameptr->icon = newicon;
  786.    newicon->occurences = 1;
  787.  
  788.    charptr = HeadChar;
  789.    i = 0;
  790.    while (charptr != NULL)
  791.       {
  792.       if (newicon->keywords == NULL)
  793.          {
  794.          newicon->keywords=(struct wordlist *)
  795.                                malloc(sizeof(struct wordlist));
  796.          wrdptr = newicon->keywords;
  797.          wrdptr->next = NULL;
  798.          }
  799.       else
  800.          {
  801.          wrdptr->next = (struct wordlist *)malloc(sizeof(struct wordlist));
  802.          wrdptr = wrdptr->next;
  803.          wrdptr->next = NULL;
  804.          }
  805.       i++;
  806.       wrdptr->indexptr = add_keyword(charptr->str);
  807.       index_add_demo(wrdptr->indexptr, newicon);
  808.       prevcharptr = charptr->next;
  809.       if (charptr->indexflag == 0)
  810.          free(charptr->str);
  811.       free(charptr);
  812.       charptr = prevcharptr;
  813.       }
  814.    newicon->numkey = i;
  815.    HeadChar = NULL;
  816.    TailChar = NULL;
  817.  
  818.     /* need to make sure this is NULL */
  819.    tmpfptr = newicon->addtlfiles;
  820.    lastfile = NULL;
  821.    while (tmpfptr != NULL)
  822.       {  
  823.       lastfile = tmpfptr;
  824.       tmpfptr = tmpfptr->next;
  825.       }
  826.    charptr = Head_FL;
  827.    while (charptr != NULL)
  828.       {
  829.       if (charptr->indexflag == 0)
  830.          { 
  831.          tmpfptr = (struct filelist *)malloc( sizeof(struct filelist) );
  832.          tmpfptr->file = add_file(charptr->str);
  833.          if (tmpfptr->file != NULL && !tmpfptr->file->ok)
  834.             newicon->ok = FALSE;
  835.          tmpfptr->next = NULL;
  836.          free(charptr->str);
  837.          if (lastfile == NULL)
  838.             {
  839.             newicon->addtlfiles = tmpfptr;
  840.             lastfile = tmpfptr;
  841.             }
  842.          else
  843.             {
  844.             lastfile->next = tmpfptr;
  845.             lastfile = tmpfptr;
  846.             }
  847.          }
  848.       prevcharptr = charptr->next;
  849.       free(charptr);
  850.       charptr = prevcharptr;
  851.       }
  852.    Head_FL = NULL;
  853.    Tail_FL = NULL;
  854.    set_start_string( newicon , ADCommand.buf);
  855.    set_alt_command( newicon , ADAltCommand.buf);
  856.    newicon->geofile = NULL;
  857.    newicon->imgfile = NULL;
  858.    newicon->helpfile = NULL;
  859.    newicon->poly = NULL;
  860.    newicon->tex_image = NULL;
  861.    newicon->tex_width = 0;
  862.    newicon->tex_height = 0;
  863.    newicon->tex_id = -1;
  864.    if (ADHfile.bufpos > 0)
  865.       newicon->helpfile = add_file(ADHfile.buf);
  866.    if (ADIfile.bufpos > 0)
  867.       newicon->geofile = add_file(ADIfile.buf);
  868.    if (ADIfile2.bufpos > 0)
  869.       newicon->imgfile = add_file(ADIfile2.buf);
  870.    do_iconfiles(newicon);
  871.    ++numberoficons;
  872.       }
  873.    if (Indexwin >= 0)
  874.       update_index_win();
  875. }
  876.  
  877.  
  878. /************************************************************
  879. *
  880. * The rest of this .c file deals with the files
  881. * that the demos need to run.
  882. *
  883. ************************************************************/
  884. void print_icon_files(struct icntmpltstruct *icn)
  885. {
  886.    struct filelist *tmpfptr;
  887.  
  888.    tmpfptr = icn->addtlfiles;
  889.    while( tmpfptr != NULL)
  890.       {
  891.       printf(" file %s \n",tmpfptr->file->name);
  892.       tmpfptr = tmpfptr->next;
  893.       }
  894.   printf("\n");
  895. }
  896.  
  897. void print_files()
  898. {
  899.    struct filestruct *tmpptr;
  900.  
  901.    tmpptr = headfile;
  902.    while (tmpptr != NULL)
  903.       {
  904.       printf(" file %s,    occurences %d \n",tmpptr->name, tmpptr->occurences);
  905.       tmpptr = tmpptr->next;
  906.       }
  907. }
  908.  
  909. void check_files()
  910. {
  911.    struct filestruct *tmpptr, *nxtptr;
  912.    int cmp1, cmp2;
  913.  
  914.    tmpptr = headfile;
  915.    while (tmpptr != NULL)
  916.       {
  917.       cmp1 = -5; cmp2 = -5;
  918.       if (tmpptr->occurences == 0)
  919.          {
  920.          nxtptr = tmpptr->next;
  921. /*
  922.          printf(" removing file %s because occurences = 0 \n",tmpptr->name);
  923. */
  924.          remove_file(tmpptr);
  925.          tmpptr = nxtptr;
  926.          }
  927.       else if ((cmp1 = strncmp(tmpptr->name, "demos/", 6)) == 0 || (cmp2 = strncmp(tmpptr->name, "../", 3))==0)
  928.          {     /* check for demos/something or ../data/demos   */
  929.          nxtptr = tmpptr->next;
  930.          tmpptr->occurences = 0;
  931.          remove_file(tmpptr);
  932.          tmpptr = nxtptr;
  933.          }
  934.       else
  935.          tmpptr = tmpptr->next;
  936.       }
  937. }
  938.  
  939. /************************************************************
  940. *
  941. * Add a file to the file list.
  942. *
  943. ************************************************************/
  944. struct filestruct *add_file(char *newfile)
  945. {
  946.    struct filestruct *tmpptr, *insert, *curptr;
  947.    int cmp_result;
  948.    int length;
  949.    int acc_ret;
  950.  
  951.    tmpptr = NULL;
  952.    insert = NULL;
  953.    cmp_result = -1;
  954.    curptr = headfile;
  955. if (curptr != NULL)
  956.    while (curptr != NULL && (cmp_result=strcmp(newfile, curptr->name)) > 0)
  957.       {
  958.       insert = curptr;
  959.       curptr = curptr->next;
  960.       }
  961.    if (cmp_result != 0) /* the file is not in the list */
  962.       {
  963.       tmpptr = (struct filestruct *)malloc( sizeof(struct filestruct) );
  964.       length = strlen(newfile);
  965.       tmpptr->name = (char *)malloc(length +1);
  966.       tmpptr->name = strcpy(tmpptr->name,newfile);
  967.       if ((acc_ret = access(tmpptr->name, F_OK)) == 0)
  968.          tmpptr->ok = TRUE;
  969.       else
  970.          tmpptr->ok = FALSE;
  971.       tmpptr->occurences = 1;
  972.       tmpptr->written = FALSE;
  973.       tmpptr->count = 0;
  974.       tmpptr->icon = NULL;
  975.       if (headfile == NULL)
  976.          {
  977.          headfile = tmpptr;
  978.          tmpptr->next = NULL;
  979.          }
  980.       else if (insert == NULL)
  981.          {
  982.          tmpptr->next = headfile;
  983.          headfile = tmpptr;
  984.          }
  985.       else
  986.          {
  987.          insert->next = tmpptr;
  988.          tmpptr->next = curptr;
  989.          }
  990.       }
  991.    else   /* the file was in the list */
  992.       {
  993.       tmpptr = curptr;
  994.       curptr->occurences++;
  995.       }
  996.    return(tmpptr);
  997. }
  998.  
  999. /************************************************************
  1000. *
  1001. * Remove a file from the file list.
  1002. *
  1003. ************************************************************/
  1004. void remove_file(struct filestruct *deadfileptr)
  1005. {
  1006.    struct filestruct *prevptr, *curptr;
  1007.    int cmp_result;
  1008.  
  1009.    if (deadfileptr != NULL)
  1010.       {
  1011.    curptr = headfile;
  1012.    prevptr = NULL;
  1013.    while (curptr != NULL && (cmp_result=strcmp(deadfileptr->name, curptr->name)) > 0)
  1014.       {
  1015.       prevptr = curptr;
  1016.       curptr = curptr->next;
  1017.       }
  1018.    if (cmp_result == 0)
  1019.       {
  1020.       if (curptr->occurences <= 1)
  1021.         {
  1022.         free(curptr->name);
  1023.         curptr->name = NULL;
  1024.         if (curptr == headfile)
  1025.            headfile = curptr->next;
  1026.         else
  1027.            prevptr->next = curptr->next;
  1028.         free(curptr);
  1029.         curptr = NULL;
  1030.         }
  1031.       else
  1032.         curptr->occurences--;
  1033.       }
  1034.       }
  1035. }
  1036.  
  1037. /************************************************************
  1038. *
  1039. * The file name pointers in the icon structure have already
  1040. * been set.  THis routine checkes that the files are present. 
  1041. * If the machine does texture mapping, the imgfile will be
  1042. * read.  If that file can not be found, or the machine does
  1043. * not do texture mapping, the geofile will be used.  If a
  1044. * geofile does not exist or has not been specified, only the
  1045. * demoname will be drawn.
  1046. *
  1047. ************************************************************/
  1048. void do_iconfiles(struct icntmpltstruct *icnptr)
  1049. {
  1050.    FILE *iconfp;
  1051.    char *fname;
  1052.    int ret;
  1053.  
  1054.    iconfp = NULL;
  1055.    if (icnptr->tex_image != NULL)
  1056.       free(icnptr->tex_image);
  1057.    if (icnptr->poly != NULL)
  1058.       free(icnptr->poly);
  1059.       icnptr->tex_image = NULL;
  1060.       icnptr->poly = NULL;
  1061.       icnptr->numpoly = 0;
  1062.       if (getgdesc(GD_TEXTURE) && icnptr->imgfile != NULL)
  1063.          {
  1064.          readicon_i( icnptr);
  1065.          icnptr->xsize = 1.0;
  1066.          icnptr->bbox[0][0] = -.1;
  1067.          icnptr->bbox[0][1] = -.1;
  1068.          icnptr->bbox[0][2] = 0.0;
  1069.          icnptr->bbox[1][0] = 1.1;
  1070.          icnptr->bbox[1][1] = -.1;
  1071.          icnptr->bbox[1][2] = 0.0;
  1072.          icnptr->bbox[2][0] = 1.1;
  1073.          icnptr->bbox[2][1] = 1.1;
  1074.          icnptr->bbox[2][2] = 0.0;
  1075.          icnptr->bbox[3][0] = -.1;
  1076.          icnptr->bbox[3][1] = 1.1;
  1077.          icnptr->bbox[3][2] = 0.0;
  1078.          }
  1079.            /* if the machine doesn't do texture mapping,
  1080.               or there's not a img file, or reading it
  1081.               doesn't work read the WorkSpace icon */
  1082.       if (icnptr->tex_image == NULL)
  1083.          {
  1084.          if (icnptr->geofile != NULL)
  1085.             {
  1086.             if (demoenv != NULL && strncmp("$DEMOS", icnptr->geofile->name, 6) == 0)
  1087.                {
  1088.                fname = (char *)malloc(demoenvlen + strlen(icnptr->geofile->name) );
  1089.                strcpy(fname, demoenv);
  1090.                strcpy(&(fname[demoenvlen]), &(icnptr->geofile->name[6]));
  1091.                }
  1092.             else if (xenv != NULL && strncmp("$XDEMOS", icnptr->geofile->name, 7) == 0)
  1093.                {
  1094.                fname = (char *)malloc(xenvlen + strlen(icnptr->geofile->name) );
  1095.                strcpy(fname, xenv);
  1096.                strcpy(&(fname[xenvlen]), &(icnptr->geofile->name[7]));
  1097.                }
  1098.             else if (sbenv != NULL && strncmp("$SBIN", icnptr->geofile->name, 5) == 0)
  1099.                {
  1100.                fname = (char *)malloc(sbenvlen + strlen(icnptr->geofile->name) );
  1101.                strcpy(fname, sbenv);
  1102.                strcpy(&(fname[sbenvlen]), &(icnptr->geofile->name[5]));
  1103.                }
  1104.             else
  1105.                {
  1106.                fname = (char *)malloc(1 + strlen(icnptr->geofile->name) );
  1107.                strcpy(fname, icnptr->geofile->name);
  1108.                }
  1109.             if ( (iconfp = fopen(fname, "r") ) == NULL)
  1110.                {
  1111.                sprintf(msgstring, "\nDemo %s\nCould not open iconfile:\n%s",icnptr->nameptr->string, icnptr->geofile->name);
  1112.                popup_Message();
  1113.                handleMessageEvents();
  1114.                icnptr->numpoly = 0;
  1115.                }
  1116.            else
  1117.                {
  1118.                icnptr->numpoly = countpolys(iconfp);
  1119.                icnptr->poly = (struct polylist *)
  1120.                    malloc((icnptr->numpoly)*sizeof(struct polylist) );
  1121.                lastvertex =readicon_g(iconfp,icnptr,lastvertex);
  1122.                }
  1123.             if (iconfp != NULL)
  1124.                {
  1125.                ret = fclose(iconfp);
  1126.                }
  1127.             free(fname);
  1128.             }
  1129.          }
  1130. }
  1131.  
  1132.  
  1133.